home *** CD-ROM | disk | FTP | other *** search
- VERSION 5.00
- Object = "{EDF439C0-99E5-11CF-AFF3-004005100200}#1.2#0"; "PVMARQ.OCX"
- Begin VB.Form MainFrm
- Caption = "Welcome"
- ClientHeight = 3525
- ClientLeft = 2055
- ClientTop = 1380
- ClientWidth = 6150
- Icon = "mainwin.frx":0000
- LinkTopic = "MainFrm"
- PaletteMode = 1 'UseZOrder
- ScaleHeight = 3525
- ScaleWidth = 6150
- Begin VB.CommandButton UDLR
- Caption = "TreeView Control"
- Height = 495
- Left = 3480
- TabIndex = 3
- Top = 2760
- Width = 2055
- End
- Begin VB.CommandButton Command3
- Caption = "Font Selection"
- Height = 495
- Left = 360
- TabIndex = 2
- Top = 2760
- Width = 2055
- End
- Begin VB.CommandButton Command2
- Caption = "Masked Input Controls"
- Height = 495
- Left = 3480
- TabIndex = 1
- Top = 1800
- Width = 2055
- End
- Begin VB.CommandButton Command1
- Caption = "Dial and Progress Bar"
- Height = 495
- Left = 360
- TabIndex = 0
- Top = 1800
- Width = 2055
- End
- Begin PVMarqueeLib.PVMarquee PVMarquee1
- Height = 1095
- Left = 480
- TabIndex = 4
- Top = 240
- Width = 4935
- _Version = 65538
- _ExtentX = 8705
- _ExtentY = 1931
- _StockProps = 29
- Text = "<IMG 1> Welcome to the <H 1>Visual Basic<H 0> Sample for <H 2>ProtoView WinX <IMG 1>"
- BackColor = 16777215
- BeginProperty Font {0BE35203-8F91-11CE-9DE3-00AA004BB851}
- Name = "MS Sans Serif"
- Size = 12
- Charset = 0
- Weight = 400
- Underline = 0 'False
- Italic = 0 'False
- Strikethrough = 0 'False
- EndProperty
- TickTime = 50
- Picture1 = "mainwin.frx":030A
- BeginProperty Font1 {0BE35203-8F91-11CE-9DE3-00AA004BB851}
- Name = "MS Sans Serif"
- Size = 18
- Charset = 0
- Weight = 700
- Underline = 0 'False
- Italic = 0 'False
- Strikethrough = 0 'False
- EndProperty
- BeginProperty Font2 {0BE35203-8F91-11CE-9DE3-00AA004BB851}
- Name = "MS Sans Serif"
- Size = 18
- Charset = 0
- Weight = 700
- Underline = 0 'False
- Italic = -1 'True
- Strikethrough = 0 'False
- EndProperty
- BeginProperty Font3 {0BE35203-8F91-11CE-9DE3-00AA004BB851}
- Name = "MS Sans Serif"
- Size = 12
- Charset = 0
- Weight = 400
- Underline = 0 'False
- Italic = 0 'False
- Strikethrough = 0 'False
- EndProperty
- BeginProperty Font4 {0BE35203-8F91-11CE-9DE3-00AA004BB851}
- Name = "MS Sans Serif"
- Size = 12
- Charset = 0
- Weight = 400
- Underline = 0 'False
- Italic = 0 'False
- Strikethrough = 0 'False
- EndProperty
- BeginProperty Font5 {0BE35203-8F91-11CE-9DE3-00AA004BB851}
- Name = "MS Sans Serif"
- Size = 12
- Charset = 0
- Weight = 400
- Underline = 0 'False
- Italic = 0 'False
- Strikethrough = 0 'False
- EndProperty
- Text = "<IMG 1> Welcome to the <H 1>Visual Basic<H 0> Sample for <H 2>ProtoView WinX <IMG 1>"
- End
- Attribute VB_Name = "MainFrm"
- Attribute VB_GlobalNameSpace = False
- Attribute VB_Creatable = False
- Attribute VB_PredeclaredId = True
- Attribute VB_Exposed = False
- Private Sub Command1_Click()
- GraphXFrm.Show
- End Sub
- Private Sub Command2_Click()
- DateFrm.Show
- End Sub
- Private Sub Command3_Click()
- FontsFrm.Show
- End Sub
- Private Sub UDLR_Click()
- UDLRFrm.Show
- End Sub
-